Top 10k strings from Letta-Head Plus (1985)(Bradway Software)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
8 "23675",o:
6 f$(l)="s")+(
5 li,col;m$(
4 Select option ";b$
4 "256"+fad)
3 design menu
2 o;" ";b$
2 li,col,m$:
2 l+l;b$;b$;
2 l+l,o;"Please ensure paper feed is OK
2 f$(l+l)=":"
2 f$(l)="s";"
2 f$(l)="s";
2 f$(l)="b"):
2 f$(l)="b"),(
2 f$(l)="b")
2 eading or
2 dr+":"+f$,((
2 This will take about min. ";
2 Filename?;"" "" for next tape file or wafadrive #:
2 Are you sure? Y/N";
2 *"wdcode",
2 ) ";b$
2 "8"*pw*(sex>
2 "61156",ph
2 "61155",pw:
2 "61153",sex:
2 "51914",o:
2 "255"*(lw>
2 "255")+lw*(lw
2 "23678",acy:
2 "23677",acx:
2 "175"-ssy:
2 "127"*(lh>
2 "127")-lh*(lh
2 "11";" ":
2 "1065"*((i$
2 copy menu
2 now"'"loaded into memory store
2 now"'"loaded into UDG area
1 y(l+l)=cy:
1 x(l+l)=x(l):
1 x(l+l)=cx:
1 wdletta
1 wdcode
1 wdLETTA+ 05
1 vtab=lht+vsep-
1 sy=sy+th-l:
1 sx=sx+th-l:
1 sx-n,by+n:
1 sht=l-(sht=l):
1 scpatch
1 s$=s$(l)+s$:
1 s$(z)="A":
1 s$(z)="0":
1 rogram linefeeds ";"
1 rint label? ";b$
1 rint heading? ";b$
1 orm length",
1 ont
1 ocation",k,k,"end"
1 o;" Please re-enter
1 o;" ";b$
1 o;" ";b$
1 o,by-sy+n+n:
1 o,-(by-sy+n+n):
1 nverse",18
1 nterfaces",
1 nches or
1 ll or define size with cursor and
1 li,col;m$:
1 l;"Input fraction of circle":
1 l,o;b$;b$:
1 l+l,n-l;i$:
1 l$(e)="H":
1 inefeed code ";
1 i$="B")+("set"
1 f$=("block"
1 f$(l)=" ")
1 et? ";b$
1 equential number"
1 e+e,o,"width=",e+e,
1 e+e,e+e;l$(
1 e+e,e+e;"Reload"
1 cx=cx+((ct-cx)
1 cx-acx,cy-acy:
1 cx-acx,cy-acy,
1 cx,cy-(cy>48
1 cx,cy+(cy<175
1 cx+(cx<255
1 change?
1 centronics
1 c$=c$+("tape "
1 c$="Save ":
1 c$="Load ":
1 by=by-th+l:
1 bx=bx-th+l:
1 bx-sx+n+n,o:
1 blockE
1 blockD
1 blockC
1 blockB
1 blockA
1 b$=" "
1 arriage return code ";
1 afadrive back-up copy"'"
1 acx,acy,a:
1 abel? ";b$
1 abel? ";b$
1 Wafadrive Version
1 Unamed wafadrive file
1 Type your linefeed code ";b$
1 Type your carriage return code ";b$
1 Single sheet mode: Press any key to start printing
1 Set label size
1 Set cursor to sequence start position and
1 Sequence option inactivated
1 Sequence format:
1 Scroll using cursor control keys
1 SAVING file
1 RS232
1 Print any character or s/shift F,W,D,Q,E
1 Letta-Head Plus - Side B
1 JRWALKER1984
1 J. R. Walker
1 Input your RS232 baud rate ";b$
1 Input vertical separation in inches "
1 Input start of sequence or "" "" to inactivate "
1 Input start column no. (2-120) ";b$
1 Input print width (
1 Input print depth (
1 Input line thickness (
1 Input label width in inches ";b$
1 Input label height in inches ";b$
1 Input horizontal separation in inches "
1 Input form length; start
1 Input filename Start drive #: for wafadrive
1 Input file name - Start drive #:";b$
1 Input drive # ";b$
1 Input 0 for tape, or wafadrive letter "
1 How many labels wide on your sheet?
1 How many labels do you want? ";b$
1 How many copies do you want? ";b$
1 HOW MANY INCHES OR LINES?";
1 For Tony Barnett0
1 Filename >10 chars
1 File must be named
1 FORM LENGTH ";fl;g$;" IS WRONG!
1 Enter copy width (1-9)
1 Enter copy height (1-2)
1 Download font ";f;" to your printer RAM?
1 DG's",k,k,"end"
1 DG",k,k,"end"
1 CIRCLE TOO BIG!";
1 CATALOGUING wafadrive ";i$
1 Bradway Software
1 BOX TOO BIG!";
1 Any key to continue ";b$
1 Alter status
1 ? ";c$;f$;
1 ;"cy=";cy;" "
1 ;"cx=";cx;" ";
1 -(bx-sx+n+n),o:
1 *"wdletta":
1 *"wdletta"
1 *"a:wdcode":
1 ) ";b$
1 (lq/law+l*(
1 (lq/law)<lq/law)):
1 (l+n*(lw+hsep)/
1 'TZXed by Andrew Barker
1 "wdletta":
1 "Wafadrive:
1 "Do you want to verify? Y/N ";a$:
1 "8"*pw)-pw*
1 "8"*ph*(cy-
1 "8")="1.62":
1 "8")+(" "
1 "70");"lash
1 "66");"eep
1 "6";lq-p*law:
1 "6";lf;" "'"
1 "6";cr;" "'"
1 "51917",sy:
1 "51917",(cy-
1 "51916",sh:
1 "51916",cy:
1 "51916",by:
1 "51915",bx:
1 "51914",sx:
1 "51914",sw:
1 "51756"+n,tab:
1 "51754",law:
1 "51753",l:
1 "51753",d-l
1 "51616"+x)
1 "51608"+x)=
1 "51328",cr:
1 "51307",cw:
1 "51262",l+l:
1 "51262",cw:
1 "51224"=cr):
1 "51224",n:
1 "51224",cr:
1 "51181",n:
1 "51181",lf:
1 "51162"*(ch=l)+
1 "51129">o;"
1 "51129"=o'"(ON to print >1 label wide!)"
1 "51129"=lf):
1 "51129",n:
1 "51129",lf:
1 "51124",cr:
1 "51103",cw:
1 "51039"*(ch=l+l))
1 "51021",n:
1 "51021",lf:
1 "50791",cy:
1 "50790",cx:
1 "50649",fad+
1 "5000"*(i$="P")+
1 "5000"*(i$="L")+
1 "5";b$;#o;
1 "4000"*(i$="P")+
1 "4000"*(i$="H")+
1 "3000"*(i$="L")+
1 "3000"*(i$="D")+
1 "30";" ":
1 "29";" ":
1 "23658"=o):
1 "23658"=o)
1 "23658",o:
1 "23658",o+
1 "2264"+(l+l
1 "2260"+(l+l
1 "22";"File";
1 "22";" "
1 "2000"*(i$="H")+
1 "2000"*(i$="D")+
1 "2"*t*(ch=l+l))*q)
1 "19";" ";
1 "19";" ":
1 "19",o,"Vert. Sep.",
1 "18";" ":
1 "18",o,"Horiz. Sep.",
1 "18",o,"Height:",
1 "175"-sh)/
1 "17";" ":
1 "17";" ";
1 "17",o;b$;b$;b$;b$
1 "17",o,"Width:",
1 "14";("CAPS"
1 "13","height=",k,k,"end"
1 "11";fl;g$;
1 "1060"*((i$
1 "1055"*((i$
1 ","4","5","0","
1 ","0","I","L":
1 ","0","A","F","
1 "(No further interfaces are available in the Wafadrive version)."
1 to quit",
1 to main menu";b$
1 to main menu",k,k,"end"
1 to main menu",e+e,
1 to main menu",20
1 to font "
1 to design
1 set coords
1 print menu
1 main menu
1 cassette label"
1 J R Walker 1984
1 = current status"''"Interfaces;"
1 ";b$
1 LETTA-HEAD
1
1
1
1
1